#---- Primary replication script ----

# Turnbull-Dugarte and López-Ortega (2025)
# "Far Right Normalization & Centrifugal Affect. Evidence from the Dating Market"
# Conditionally accepted at 'Journal of Politics' (April 14th 2025)
# README: This single script will reproduce all analysis and output from the main text and supplementary appendix file,
# and produces three .html files of the log output from each.

remove(list=ls())

library(knitr)
library(sessioninfo)  

rmarkdown::render("subscript1_datawrangling.R")
rmarkdown::render("subscript2_mainanalysis.R")
rmarkdown::render("subscript3_appendixmaterial.R")

writeLines(c(
  "---- Session Info: Turnbull-Dugarte and López-Ortega (2025) ----",
  capture.output(sessioninfo::session_info())
), "session_log.txt")
